/*
 * To change this template, choose Tools | Templates
 * and open the template in the editor.
 */

package sixdegrees.android;

import java.io.DataInputStream;
import java.io.DataOutputStream;
import java.io.IOException;
import java.net.ServerSocket;
import java.net.Socket;
import java.util.ArrayList;
import java.util.HashMap;
import java.util.List;
import java.util.Map;
import java.util.Set;
import java.util.logging.Level;
import java.util.logging.Logger;
import javax.ejb.EJB;
import javax.servlet.ServletException;
import javax.servlet.ServletInputStream;
import javax.servlet.ServletOutputStream;
import javax.servlet.http.HttpServlet;
import javax.servlet.http.HttpServletRequest;
import javax.servlet.http.HttpServletResponse;
import javax.servlet.http.HttpSession;
import redinftel.entidades.Usuario;
import redinftel.sesiones.UsuarioFacadeRemote;

/**
 *
 * @author Fran
 */
public class AmigosConectadosServlet extends HttpServlet {
    @EJB
    private UsuarioFacadeRemote usuarioFacade;
   
      final String USUARIO = "usuario";
    
    private String miNombre;
    static Map<Integer,HebraTcp> mapa= new HashMap<Integer,HebraTcp>();
    public int obtenerPuerto()
    {
        int puerto=1025;
        boolean libre=false;
        ServerSocket serv;
        while(!libre)
        {
            try{
                serv=new ServerSocket(puerto);
                libre=true;
                serv.close();
            }catch(IOException e)
            {
                puerto=puerto+1%65535;
                if(puerto==0)
                    puerto=1025;

            }
        }
        return puerto;
    }
    class HebraTcp extends Thread{
        public ServerSocket socketServ;
        public int puerto12,puerto21;
        public String ip1,ip2;
        public HebraTcp(String ip)
        {
            try {
                ip1=ip;
                puerto21=obtenerPuerto();
                socketServ = new ServerSocket(puerto21);
                
                System.out.println(puerto21);
            } catch (IOException ex) {
                Logger.getLogger(AmigosConectadosServlet.class.getName()).log(Level.SEVERE, null, ex);
            }
        }

        @Override
        public void run() {
            try {
                Socket s = socketServ.accept();

                puerto12=obtenerPuerto();
                
                DataOutputStream dos = new DataOutputStream(s.getOutputStream());
                dos.writeInt(puerto21);
                dos.writeInt(puerto12);
                dos.writeUTF(ip2);
                dos.writeUTF(miNombre);
                dos.flush();
                dos.close();
                Thread.sleep(1000);
                s.close();
                socketServ.close();
            } catch (InterruptedException ex) {
                Logger.getLogger(AmigosConectadosServlet.class.getName()).log(Level.SEVERE, null, ex);
            } catch (IOException ex) {
                Logger.getLogger(AmigosConectadosServlet.class.getName()).log(Level.SEVERE, null, ex);
            }

        }

        private void setIp2(String ip) {
            ip2=ip;
        }

    }
    protected void processRequest(HttpServletRequest request, HttpServletResponse response)
    throws ServletException, IOException {
        ServletInputStream is = request.getInputStream();
        DataInputStream dis= new DataInputStream(is);
        String ip=dis.readUTF();
        boolean espero=dis.readBoolean();
        boolean salir=dis.readBoolean();
        HttpSession sesion = request.getSession();
        Usuario yo = (Usuario) sesion.getAttribute(USUARIO);        
        miNombre=yo.getPerfil().getNombre();

        if(espero)
        {
            if(!salir){
                //crear hebra socket
                HebraTcp h = new HebraTcp(ip);
                mapa.put(yo.getIdUsuario().intValue(),h);
                
            }else{
                HebraTcp h=mapa.get(yo.getIdUsuario().intValue());
                mapa.remove(yo.getIdUsuario().intValue());
                h.socketServ.close();
                
            }

        }else{ //llamo

            if(salir){
                 int puerto21=0,puerto12=0;
                 String ip1="";
                //Enviar al que espera
                int idAmigo=dis.readInt();
                try{
                HebraTcp h=mapa.get(idAmigo);
                h.setIp2(ip);
                h.start();
                puerto12=h.puerto12;
                puerto21=h.puerto21;
                ip1=h.ip1;

                mapa.remove(idAmigo);
                }catch(Exception e)
                {
                }finally{
                //Enviar al que llama
                ServletOutputStream os = response.getOutputStream();
                DataOutputStream dos = new DataOutputStream(os);
                dos.writeInt(puerto12); //puerto1->2
                dos.writeInt(puerto21); //puerto2->1
                dos.writeUTF(ip1);
                dos.writeUTF(miNombre);

                dos.close();}
            }else{
                //obtener lista de amigos en el map y mandar
                Set<Integer>genteEspera=mapa.keySet();
                List<Usuario> friends=usuarioFacade.findAmigosMinusLista(yo,"");
                List<Usuario> amigosEspera=new ArrayList<Usuario>();

                for(Usuario u:friends)
                {
                    if(genteEspera.contains(u.getIdUsuario().intValue()))
                        amigosEspera.add(u);

                }
                //enviar lista
                ServletOutputStream os = response.getOutputStream();
                DataOutputStream dos = new DataOutputStream(os);

                dos.writeInt(amigosEspera.size());
                for(Usuario u:amigosEspera){
                      dos.writeUTF(u.getPerfil().getNombre()+" "+u.getPerfil().getApellidos());
                      dos.writeInt(u.getIdUsuario().intValue());
                }

                dos.close();
            }

        }
         dis.close();
         is.close();
    } 

    // <editor-fold defaultstate="collapsed" desc="HttpServlet methods. Click on the + sign on the left to edit the code.">
    /** 
     * Handles the HTTP <code>GET</code> method.
     * @param request servlet request
     * @param response servlet response
     * @throws ServletException if a servlet-specific error occurs
     * @throws IOException if an I/O error occurs
     */
    @Override
    protected void doGet(HttpServletRequest request, HttpServletResponse response)
    throws ServletException, IOException {
        processRequest(request, response);
    } 

    /** 
     * Handles the HTTP <code>POST</code> method.
     * @param request servlet request
     * @param response servlet response
     * @throws ServletException if a servlet-specific error occurs
     * @throws IOException if an I/O error occurs
     */
    @Override
    protected void doPost(HttpServletRequest request, HttpServletResponse response)
    throws ServletException, IOException {
        processRequest(request, response);
    }

    /** 
     * Returns a short description of the servlet.
     * @return a String containing servlet description
     */
    @Override
    public String getServletInfo() {
        return "Short description";
    }// </editor-fold>

}
